home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / pp / pp-6.0 / Format / asn / asn1 / gentxt.py < prev    next >
Encoding:
Text File  |  1991-12-18  |  1003 b   |  47 lines
  1. -- gentxt.py:
  2.  
  3. -- @(#) $Header: /xtel/pp/pp-beta/Format/asn/asn1/RCS/gentxt.py,v 6.0 1991/12/18 20:16:32 jpo Rel $
  4. --
  5. -- $Log: gentxt.py,v $
  6. -- Revision 6.0  1991/12/18  20:16:32  jpo
  7. -- Release 6.0
  8. --
  9. --
  10. --
  11.  
  12. --
  13. --
  14. -- This is an EXTENDED-BODY-PART-TYPE FOR GENERAL TEXT
  15. --
  16. --
  17.  
  18.  
  19. GenTxt DEFINITIONS IMPLICIT TAGS ::=
  20.  
  21. %{
  22. #ifndef    lint
  23. static char *Rcsid = "@(#)$Header: /xtel/pp/pp-beta/Format/asn/asn1/RCS/gentxt.py,v 6.0 1991/12/18 20:16:32 jpo Rel $";
  24. #endif    lint
  25. %}
  26.  
  27. BEGIN
  28.  
  29. GenTxtBodyPart ::= SEQUENCE {
  30.         parameters    GenTxtParameters,
  31.         data        GenTxtData
  32.         }
  33.  
  34. GenTxtParameters ::= SET {
  35.         g0-designator [0] CharacterSetDesignator OPTIONAL, 
  36.         g1-designator [1] CharacterSetDesignator OPTIONAL, 
  37.         g2-designator [2] CharacterSetDesignator OPTIONAL, 
  38.         g3-designator [3] CharacterSetDesignator OPTIONAL, 
  39.         c0-designator [4] CharacterSetDesignator OPTIONAL, 
  40.         c1-designator [5] CharacterSetDesignator OPTIONAL
  41.         }
  42.  
  43. CharacterSetDesignator ::= GeneralString (SIZE (3..5))
  44.  
  45. GenTxtData ::= GeneralString
  46. END
  47.